home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 25 / 64er_Magazin_Sonderheft_25_19xx_Markt__Technik_de.d64 / dir komplett (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  938b  |  46 lines
  1. 10 rem *******************************
  2. 20 rem ***    auflistung aller    ****
  3. 30 rem *** eintraege im directory ****
  4. 40 rem *******************************
  5. 50 :
  6. 60 :
  7. 70 zd=1
  8. 80 forl=1to16:va$=va$+chr$(160):next
  9. 90 print"[147]--- koplettes directory ---"
  10. 100 print"(alle nummerierungen basieren auf null)
  11. 110 [153]"ausgabe auf bwaitildschirm"
  12. 120 [153]"       oder dwaitrucker    ";
  13. 130 [133]au$
  14. 140 [139]au$[178]"b"[167]au[178]3:[137]170
  15. 150 [139]au$[178]"d"[167]au[178]4:[137]170
  16. 160 [137]110
  17. 170 [153]"diskette einlegen und taste..."
  18. 180 [161]g$:[139]g$[178]""[167]180
  19. 190 tr[178]18:se[178]1
  20. 200 [159]15,8,15:[159]2,8,2,"#"
  21. 210 [152]15,"u1";2;0;tr;se
  22. 220 [132]15,a,b$,c,d
  23. 230 [139]a[177]0[167][153]"achtung!!":[153]b$:[137]170
  24. 240 [139]au[178]3[167][153]"load"
  25. 250 [159]3,au
  26. 255 [152]3,"track"tr" / sektor"se
  27. 260 [129]l[178]0[164]7
  28. 270 [152]15,"b-p";2;l[172]32[170]5
  29. 280 da$[178]""
  30. 290 [129]m[178]1[164]16
  31. 300 [161]#2,a$
  32. 310 da$[178]da$[170]a$
  33. 320 [139]da$[178]va$[167]500
  34. 330 [130]
  35. 340 [152]3,zd": "da$
  36. 350 zd[178]zd[170]1
  37. 360 [130]
  38. 370 [152]15,"b-p";2;0
  39. 380 [161]#2,nt$:[161]#2,ns$
  40. 390 nt[178][198](nt$[170][199](0)):ns[178][198](ns$[170][199](0))
  41. 400 [139]ns[177]20[167]500
  42. 410 tr[178]nt:se[178]ns
  43. 420 [152]15,"u1";2;0;tr;se
  44. 430 [137]255
  45. 500 [160]15:[160]2:[160]3
  46.